#!/usr/bin/perl

use mod_db;

db_init( 'test.db' );

db_exists( "aaa" ) ? print "yes\n" : print "no\n";
db_store ( "aaa" );
db_exists( "aaa" ) ? print "yes\n" : print "no\n";

`rm test.db`;
